Chip 2004 November/CMCD1104.ISO/Software/Shareware/Utilitare/picozip/PicoZipSetup.exe/{app}/PicoZip.exe/0/RCDATA/TFMBATCH/TFMBATCH.txt

Text File | 2004-09-09 | 30.3 KB | 1,252 lines

object fmBatch: TfmBatch
  Left = 322
  Top = 253
  Width = 546
  Height = 389
  BorderIcons = [biSystemMenu]
  Caption = 'Batch Tool'
  Color = clBtnFace
  Constraints.MinHeight = 389
  Constraints.MinWidth = 546
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object paBottom: TPanel
    Left = 0
    Top = 317
    Width = 538
    Height = 43
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    DesignSize = (
      538
      43)
    object bvBottom: TBevel
      Left = 0
      Top = 0
      Width = 538
      Height = 3
      Align = alTop
      Shape = bsTopLine
    end
    object buNext: TButton
      Left = 295
      Top = 10
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      Caption = '&Next >'
      Default = True
      TabOrder = 0
      OnClick = buNextClick
    end
    object buCancel: TButton
      Left = 375
      Top = 10
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      Caption = '&Cancel'
      TabOrder = 1
      OnClick = buCancelClick
    end
    object buHelp: TButton
      Left = 455
      Top = 10
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      Caption = '&Help'
      TabOrder = 2
      OnClick = buHelpClick
    end
  end
  object nbMain: TNotebook
    Left = 0
    Top = 0
    Width = 538
    Height = 317
    Align = alClient
    TabOrder = 0
    object TPage
      Left = 0
      Top = 0
      Caption = 'SelectFiles'
      DesignSize = (
        538
        317)
      object laSelectedFiles: TLabel
        Left = 8
        Top = 40
        Width = 521
        Height = 41
        Anchors = [akLeft, akTop, akRight]
        AutoSize = False
        Caption =
          'Please select files to process by clicking on the "Add" button. ' +
          'You can remove any item from the list by selecting them, then cl' +
          'ick the "Remove" button. After adding all the files you want to ' +
          'process, click the "Next" button to proceed.'
        WordWrap = True
      end
      object laTitle0: TLabel
        Left = 8
        Top = 8
        Width = 114
        Height = 13
        Caption = 'Select Archive Files'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object bvTitle0: TBevel
        Left = 8
        Top = 27
        Width = 526
        Height = 9
        Anchors = [akLeft, akTop, akRight]
        Shape = bsTopLine
      end
      object lbSelectedFiles: TListBox
        Left = 8
        Top = 88
        Width = 437
        Height = 222
        Anchors = [akLeft, akTop, akRight, akBottom]
        ItemHeight = 13
        MultiSelect = True
        PopupMenu = pmSelect
        TabOrder = 0
      end
      object buAddFile: TButton
        Left = 452
        Top = 88
        Width = 75
        Height = 25
        Anchors = [akTop, akRight]
        Caption = '&Add'
        TabOrder = 1
        OnClick = buAddFileClick
      end
      object buRemoveFile: TButton
        Left = 452
        Top = 120
        Width = 75
        Height = 25
        Anchors = [akTop, akRight]
        Caption = '&Remove'
        TabOrder = 2
        OnClick = buRemoveFileClick
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Progress'
      DesignSize = (
        538
        317)
      object laProgressFilename: TLabel
        Left = 8
        Top = 40
        Width = 99
        Height = 13
        Caption = 'Currently Processing:'
      end
      object laCurrentFile: TLabel
        Left = 8
        Top = 56
        Width = 521
        Height = 13
        Anchors = [akLeft, akTop, akRight]
        AutoSize = False
      end
      object laProgressTotal: TLabel
        Left = 8
        Top = 120
        Width = 53
        Height = 13
        Caption = 'Total Time:'
      end
      object laProgressCurrent: TLabel
        Left = 8
        Top = 80
        Width = 56
        Height = 13
        Caption = 'Current File:'
      end
      object laFilesProcessed: TLabel
        Left = 8
        Top = 168
        Width = 77
        Height = 13
        Caption = 'Files Processed:'
      end
      object laTotalPercent: TLabel
        Left = 472
        Top = 120
        Width = 56
        Height = 13
        Alignment = taRightJustify
        Anchors = [akTop, akRight]
        AutoSize = False
        Caption = '0%'
      end
      object laCurrentPercent: TLabel
        Left = 472
        Top = 80
        Width = 57
        Height = 13
        Alignment = taRightJustify
        Anchors = [akTop, akRight]
        AutoSize = False
        Caption = '0%'
      end
      object laTitle1: TLabel
        Left = 8
        Top = 8
        Width = 50
        Height = 13
        Caption = 'Progress'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object bvTitle1: TBevel
        Left = 8
        Top = 27
        Width = 524
        Height = 9
        Anchors = [akLeft, akTop, akRight]
        Shape = bsTopLine
      end
      object pbCurrent: TProgressBar
        Left = 8
        Top = 96
        Width = 521
        Height = 17
        Anchors = [akLeft, akTop, akRight]
        TabOrder = 0
      end
      object pbTotal: TProgressBar
        Left = 8
        Top = 136
        Width = 521
        Height = 17
        Anchors = [akLeft, akTop, akRight]
        TabOrder = 1
      end
      object lbProgressCompleted: TListBox
        Left = 8
        Top = 184
        Width = 521
        Height = 119
        Anchors = [akLeft, akTop, akRight, akBottom]
        ItemHeight = 13
        TabOrder = 2
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Result'
      DesignSize = (
        538
        317)
      object laResults: TLabel
        Left = 8
        Top = 40
        Width = 66
        Height = 13
        Caption = 'Batch Results'
      end
      object laTitle2: TLabel
        Left = 8
        Top = 8
        Width = 80
        Height = 13
        Caption = 'Batch Results'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object bvTitle2: TBevel
        Left = 8
        Top = 27
        Width = 521
        Height = 9
        Anchors = [akLeft, akTop, akRight]
        Shape = bsTopLine
      end
      object buCopyResults: TButton
        Left = 432
        Top = 56
        Width = 99
        Height = 25
        Anchors = [akTop, akRight]
        Caption = 'Copy to Clipboard'
        TabOrder = 1
        OnClick = buCopyResultsClick
      end
      object buSaveResults: TButton
        Left = 432
        Top = 88
        Width = 99
        Height = 25
        Anchors = [akTop, akRight]
        Caption = 'Save to File'
        TabOrder = 2
        OnClick = buSaveResultsClick
      end
      object meResults: TMemo
        Left = 8
        Top = 56
        Width = 417
        Height = 251
        Anchors = [akLeft, akTop, akRight, akBottom]
        ReadOnly = True
        ScrollBars = ssBoth
        TabOrder = 0
        WordWrap = False
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'SelectOutputDir'
      DesignSize = (
        538
        317)
      object laOutputFolder: TLabel
        Left = 8
        Top = 40
        Width = 521
        Height = 13
        AutoSize = False
        Caption = 'Please select the output folder:'
      end
      object laTitle4: TLabel
        Left = 8
        Top = 8
        Width = 118
        Height = 13
        Caption = 'Select Output Folder'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object bvTitle4: TBevel
        Left = 8
        Top = 27
        Width = 524
        Height = 9
        Anchors = [akLeft, akTop, akRight]
        Shape = bsTopLine
      end
      object rbOutputSame: TRadioButton
        Left = 16
        Top = 64
        Width = 321
        Height = 17
        Caption = 'Use the same folder as the original file'
        Checked = True
        TabOrder = 0
        TabStop = True
        OnClick = rbOutputFolderClick
      end
      object rbOutputFolder: TRadioButton
        Left = 16
        Top = 90
        Width = 57
        Height = 17
        Caption = 'Folder:'
        TabOrder = 1
        OnClick = rbOutputFolderClick
      end
      object rxdeOutputFolder: TJvDirectoryEdit
        Left = 72
        Top = 86
        Width = 377
        Height = 21
        DialogKind = dkWin32
        DialogText = 'Select Output Folder'
        DialogOptions = [sdAllowCreate, sdPerformCreate]
        ButtonFlat = False
        Enabled = False
        NumGlyphs = 1
        TabOrder = 2
      end
      object ckExtractToSubfolder: TCheckBox
        Left = 17
        Top = 128
        Width = 360
        Height = 17
        Caption =
          'Extract each archive to a separate subfolder in the output folde' +
          'r above'
        TabOrder = 3
        Visible = False
      end
      object ckRestoreFolders: TCheckBox
        Left = 17
        Top = 146
        Width = 136
        Height = 17
        Caption = 'Restore original folders'
        TabOrder = 4
        Visible = False
      end
      object ckConfirmOverwrites: TCheckBox
        Left = 17
        Top = 164
        Width = 128
        Height = 17
        Caption = 'Confirm file overwrites'
        TabOrder = 5
        Visible = False
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'SelectArcFmt'
      DesignSize = (
        538
        317)
      object laOutputFmt: TLabel
        Left = 8
        Top = 40
        Width = 247
        Height = 13
        Caption = 'Please select the format for the archive files created:'
      end
      object laTitle5: TLabel
        Left = 8
        Top = 8
        Width = 107
        Height = 13
        Caption = 'Batch Add Options'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object bvTitle5: TBevel
        Left = 8
        Top = 27
        Width = 524
        Height = 9
        Anchors = [akLeft, akTop, akRight]
        Shape = bsTopLine
      end
      object rbBh: TRadioButton
        Left = 16
        Top = 64
        Width = 200
        Height = 17
        Caption = '.bh (BlakHole)'
        TabOrder = 0
      end
      object rbCab: TRadioButton
        Tag = 1
        Left = 16
        Top = 80
        Width = 200
        Height = 17
        Caption = '.cab (Microsoft Cabinet)'
        TabOrder = 1
      end
      object rbGz: TRadioButton
        Tag = 5
        Left = 16
        Top = 176
        Width = 200
        Height = 17
        Caption = '.gz (Unix GZip)'
        TabOrder = 2
      end
      object rbJar: TRadioButton
        Tag = 6
        Left = 16
        Top = 96
        Width = 200
        Height = 17
        Caption = '.jar (Javasoft Archive)'
        TabOrder = 3
      end
      object rbLha: TRadioButton
        Tag = 2
        Left = 16
        Top = 112
        Width = 200
        Height = 17
        Caption = '.lha (LHA Archive)'
        TabOrder = 4
      end
      object rbLzh: TRadioButton
        Tag = 2
        Left = 16
        Top = 128
        Width = 200
        Height = 17
        Caption = '.lzh (LZH Archive)'
        TabOrder = 5
      end
      object rbTar: TRadioButton
        Tag = 4
        Left = 16
        Top = 144
        Width = 200
        Height = 17
        Caption = '.tar (Unix Tape Archive)'
        TabOrder = 6
      end
      object rbZip: TRadioButton
        Tag = 3
        Left = 16
        Top = 160
        Width = 200
        Height = 17
        Caption = '.zip (Zip Archive)'
        Checked = True
        TabOrder = 7
        TabStop = True
      end
      object ckDeleteSource: TCheckBox
        Left = 8
        Top = 200
        Width = 209
        Height = 17
        Caption = 'Delete original file after creating archive'
        TabOrder = 8
      end
      object ckAutoOverwrite: TCheckBox
        Left = 8
        Top = 216
        Width = 185
        Height = 17
        Caption = 'Overwrite files without prompting'
        TabOrder = 9
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'AddOptions'
      DesignSize = (
        538
        317)
      object laFilesToAdd: TLabel
        Left = 8
        Top = 40
        Width = 258
        Height = 13
        Caption = 'Select files to add to your previously selected archives:'
      end
      object laTitle6: TLabel
        Left = 8
        Top = 8
        Width = 108
        Height = 13
        Caption = 'Select Files to Add'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object bvTitle6: TBevel
        Left = 8
        Top = 27
        Width = 523
        Height = 9
        Anchors = [akLeft, akTop, akRight]
        Shape = bsTopLine
      end
      object lbAddFiles: TListBox
        Left = 8
        Top = 56
        Width = 441
        Height = 183
        Anchors = [akLeft, akTop, akRight, akBottom]
        ItemHeight = 13
        MultiSelect = True
        PopupMenu = pmSelect
        TabOrder = 0
      end
      object buAddMore: TButton
        Left = 456
        Top = 56
        Width = 75
        Height = 25
        Anchors = [akTop, akRight]
        Caption = '&Add'
        TabOrder = 1
        OnClick = buAddMoreClick
      end
      object buRemoveMore: TButton
        Left = 456
        Top = 88
        Width = 75
        Height = 25
        Anchors = [akTop, akRight]
        Caption = '&Remove'
        TabOrder = 2
        OnClick = buRemoveMoreClick
      end
      object gbAddOptions: TGroupBox
        Left = 8
        Top = 243
        Width = 441
        Height = 65
        Anchors = [akLeft, akRight, akBottom]
        Caption = 'Add Options'
        TabOrder = 3
        object laAddCompression: TLabel
          Left = 16
          Top = 20
          Width = 66
          Height = 13
          Caption = 'Compression: '
        end
        object cbAddCompression: TComboBox
          Left = 16
          Top = 36
          Width = 145
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          ItemIndex = 0
          TabOrder = 0
          Text = 'Maximum'
          Items.Strings = (
            'Maximum'
            'Normal'
            'Light'
            'Minimum'
            'None')
        end
        object ckAddSaveFullPath: TCheckBox
          Left = 232
          Top = 40
          Width = 129
          Height = 17
          Caption = 'Save full path info'
          TabOrder = 1
        end
        object ckAddAutoOverwrite: TCheckBox
          Left = 232
          Top = 16
          Width = 185
          Height = 17
          Caption = 'Overwrite files without prompting'
          TabOrder = 2
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'DeleteSpec'
      DesignSize = (
        538
        317)
      object laTitle7: TLabel
        Left = 8
        Top = 8
        Width = 208
        Height = 13
        Caption = 'Enter File Names or Masks to Delete'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object bvTitle7: TBevel
        Left = 8
        Top = 27
        Width = 523
        Height = 9
        Anchors = [akLeft, akTop, akRight]
        Shape = bsTopLine
      end
      object laDeleteSpecList: TLabel
        Left = 8
        Top = 40
        Width = 324
        Height = 13
        Caption =
          'File names or masks to delete from your previously selected arch' +
          'ives:'
      end
      object laCurDeleteSpec: TLabel
        Left = 344
        Top = 56
        Width = 75
        Height = 13
        Caption = 'File name/mask'
      end
      object lbDeleteSpec: TListBox
        Left = 8
        Top = 56
        Width = 329
        Height = 249
        Anchors = [akLeft, akTop, akRight, akBottom]
        ItemHeight = 13
        MultiSelect = True
        TabOrder = 0
      end
      object buAddDeleteSpec: TButton
        Left = 344
        Top = 100
        Width = 89
        Height = 25
        Anchors = [akTop, akRight]
        Caption = '&Add'
        TabOrder = 2
        OnClick = buAddDeleteSpecClick
      end
      object buRemoveDeleteSpec: TButton
        Left = 440
        Top = 100
        Width = 89
        Height = 25
        Anchors = [akTop, akRight]
        Caption = '&Remove'
        TabOrder = 3
        OnClick = buRemoveDeleteSpecClick
      end
      object edDeleteSpec: TEdit
        Left = 344
        Top = 72
        Width = 185
        Height = 21
        TabOrder = 1
      end
    end
  end
  object ztvBlakHole: TBlakHole
    OnError = ztvZipError
    Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
    DeleteOptions = doAllowUndo
    RecurseDirs = False
    ArcType = atBh
    AttributesEx = []
    CompressMethod = cmDeflate
    DefaultExt = '.bh'
    StoreFilesOfType.Strings = (
      '.ACE'
      '.ARC'
      '.ARJ'
      '.BH'
      '.CAB'
      '.ENC'
      '.GZ'
      '.HA'
      '.JAR'
      '.LHA'
      '.LZH'
      '.PAK'
      '.PK3'
      '.PK_'
      '.RAR'
      '.TAR'
      '.TGZ'
      '.UUE'
      '.UU'
      '.WAR'
      '.XXE'
      '.Z'
      '.ZIP'
      '.ZOO')
    Switch = swAdd
    TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
    OnNonWriteableArchive = ztvZipNonWriteableArchive
    OnProgress = ztvUnZipProgress
    OnGetPassword = ztvUnZipGetPassword
    OnRenameDupeFile = ztvZipRenameDupeFile
    OnReplaceFile = ztvZipReplaceFile
    Left = 8
    Top = 296
  end
  object ztvGZip: TGZip
    OnError = ztvZipError
    Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
    DeleteOptions = doAllowUndo
    ArcType = atGZip
    AttributesEx = []
    DefaultExt = '.gz'
    CompressMethod = cmDeflate
    ConfirmOverwrites = True
    Switch = swAdd
    OnNonWriteableArchive = ztvZipNonWriteableArchive
    OnProgress = ztvUnZipProgress
    OnFileExists = ztvGZipFileExists
    Left = 36
    Top = 296
  end
  object ztvLha: TLha
    OnError = ztvZipError
    Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
    DeleteOptions = doAllowUndo
    RecurseDirs = False
    ArcType = atLha
    CompressMethod = cmFrozen6
    DefaultExt = '.lha'
    StoreFilesOfType.Strings = (
      '.ACE'
      '.ARC'
      '.ARJ'
      '.BH'
      '.CAB'
      '.ENC'
      '.GZ'
      '.HA'
      '.JAR'
      '.LHA'
      '.LZH'
      '.PAK'
      '.PK3'
      '.PK_'
      '.RAR'
      '.TAR'
      '.TGZ'
      '.UUE'
      '.UU'
      '.WAR'
      '.XXE'
      '.Z'
      '.ZIP'
      '.ZOO')
    Switch = swAdd
    TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
    OnNonWriteableArchive = ztvZipNonWriteableArchive
    OnProgress = ztvUnZipProgress
    OnRenameDupeFile = ztvZipRenameDupeFile
    OnReplaceFile = ztvZipReplaceFile
    Left = 64
    Top = 296
  end
  object ztvJar: TJar
    OnError = ztvZipError
    Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
    DeleteOptions = doAllowUndo
    RecurseDirs = False
    ArcType = atJar
    AttributesEx = []
    CompressMethod = cmDeflate
    DefaultExt = '.jar'
    SeedDataKeys.Key0 = 305419896
    SeedDataKeys.Key1 = 591751049
    SeedDataKeys.Key2 = 878082192
    SeedHeaderKeys.Key0 = 269766672
    SeedHeaderKeys.Key1 = 33834504
    SeedHeaderKeys.Key2 = 541352064
    StoreFilesOfType.Strings = (
      '.ACE'
      '.ARC'
      '.ARJ'
      '.BH'
      '.CAB'
      '.ENC'
      '.GZ'
      '.HA'
      '.JAR'
      '.LHA'
      '.LZH'
      '.PAK'
      '.PK3'
      '.PK_'
      '.RAR'
      '.TAR'
      '.TGZ'
      '.UUE'
      '.UU'
      '.WAR'
      '.XXE'
      '.Z'
      '.ZIP'
      '.ZOO')
    TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
    OnDiskWriteProtectErr = ztvZipDiskWriteProtectErr
    OnDiskInDrvErr = ztvZipDiskInDrvErr
    OnGetPassword = ztvUnZipGetPassword
    OnInsertDisk = ztvZipInsertDisk
    OnNonWriteableArchive = ztvZipNonWriteableArchive
    OnProgress = ztvUnZipProgress
    OnRenameDupeFile = ztvZipRenameDupeFile
    OnReplaceFile = ztvZipReplaceFile
    Switch = swAdd
    Left = 92
    Top = 296
  end
  object ztvMakeCab: TMakeCab
    OnError = ztvZipError
    Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
    DeleteOptions = doAllowUndo
    RecurseDirs = False
    ArcType = atCab
    CompressMethod = cmMsZip
    DefaultExt = '.cab'
    OnNonWriteableArchive = ztvZipNonWriteableArchive
    OnProgress = ztvUnZipProgress
    OnReplaceFile = ztvZipReplaceFile
    TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
    Left = 120
    Top = 296
  end
  object ztvTar: TTar
    OnError = ztvZipError
    Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
    DeleteOptions = doAllowUndo
    RecurseDirs = False
    ArcType = atTar
    DefaultExt = '.tar'
    CompressMethod = cmTarred
    Switch = swAdd
    TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
    UnixUName = 'root'
    UnixGName = 'root'
    OnNonWriteableArchive = ztvZipNonWriteableArchive
    OnProgress = ztvUnZipProgress
    OnRenameDupeFile = ztvZipRenameDupeFile
    OnReplaceFile = ztvZipReplaceFile
    Left = 148
    Top = 296
  end
  object ztvZip: TZip
    OnError = ztvZipError
    Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
    DeleteOptions = doAllowUndo
    RecurseDirs = False
    ArcType = atZip
    AttributesEx = []
    CompressMethod = cmDeflate
    DefaultExt = '.zip'
    SeedDataKeys.Key0 = 305419896
    SeedDataKeys.Key1 = 591751049
    SeedDataKeys.Key2 = 878082192
    SeedHeaderKeys.Key0 = 269766672
    SeedHeaderKeys.Key1 = 33834504
    SeedHeaderKeys.Key2 = 541352064
    StoreFilesOfType.Strings = (
      '.ACE'
      '.ARC'
      '.ARJ'
      '.BH'
      '.CAB'
      '.ENC'
      '.GZ'
      '.HA'
      '.JAR'
      '.LHA'
      '.LZH'
      '.PAK'
      '.PK3'
      '.PK_'
      '.RAR'
      '.TAR'
      '.TGZ'
      '.UUE'
      '.UU'
      '.WAR'
      '.XXE'
      '.Z'
      '.ZIP'
      '.ZOO')
    TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
    OnDiskWriteProtectErr = ztvZipDiskWriteProtectErr
    OnDiskInDrvErr = ztvZipDiskInDrvErr
    OnGetPassword = ztvUnZipGetPassword
    OnInsertDisk = ztvZipInsertDisk
    OnNonWriteableArchive = ztvZipNonWriteableArchive
    OnProgress = ztvUnZipProgress
    OnRenameDupeFile = ztvZipRenameDupeFile
    OnReplaceFile = ztvZipReplaceFile
    Switch = swAdd
    Left = 176
    Top = 296
  end
  object ztvUUEncode: TUUEncode
    OnError = ztvZipError
    Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
    DeleteOptions = doAllowUndo
    CompressMethod = cmUUEncode
    DefaultExt = '.uue'
    KBytesPerVolume = 0
    WriteTableToFile = False
    OnFileExists = ztvGZipFileExists
    OnNonWriteableArchive = ztvZipNonWriteableArchive
    OnProgress = ztvUnZipProgress
    Left = 204
    Top = 296
  end
  object ztvUnACE: TUnACE
    OnError = ztvUnZipError
    CpuType = cptAuto
    OnProgress = ztvUnZipProgress
    OnGetPassword = ztvUnZipGetPassword
    OnFileExists = ztvUnZipFileExists
    Left = 8
    Top = 328
  end
  object ztvUnArc: TUnArc
    OnError = ztvUnZipError
    CpuType = cptAuto
    OnFileExists = ztvUnZipFileExists
    OnProgress = ztvUnZipProgress
    Left = 36
    Top = 328
  end
  object ztvUnArj: TUnARJ
    OnError = ztvUnZipError
    CpuType = cptAuto
    OnFileExists = ztvUnZipFileExists
    OnGetPassword = ztvUnZipGetPassword
    OnProgress = ztvUnZipProgress
    Left = 64
    Top = 328
  end
  object ztvUnBh: TUnBh
    OnError = ztvUnZipError
    CpuType = cptAuto
    SeedDataKeys.Key0 = 305419896
    SeedDataKeys.Key1 = 591751049
    SeedDataKeys.Key2 = 878082192
    OnProgress = ztvUnZipProgress
    OnFileExists = ztvUnZipFileExists
    OnGetPassword = ztvUnZipGetPassword
    Left = 92
    Top = 328
  end
  object ztvUnCab: TUnCab
    OnError = ztvUnZipError
    CpuType = cptAuto
    OnProgress = ztvUnZipProgress
    OnFileExists = ztvUnZipFileExists
    Left = 120
    Top = 328
  end
  object ztvUUDecode: TUUDecode
    OnError = ztvUnZipError
    CpuType = cptAuto
    Algorithm = uudecode
    VolumeStartNum = 0
    OnProgress = ztvUnZipProgress
    OnFileExists = ztvUnZipFileExists
    Left = 148
    Top = 328
  end
  object ztvUnGZip: TUnGZip
    OnError = ztvUnZipError
    CpuType = cptAuto
    GzTarDeleteOptions = doFinal
    TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
    OnProgress = ztvUnZipProgress
    OnFileExists = ztvUnZipFileExists
    OnNestedTarFile = ztvUnGZipNestedTarFile
    Left = 176
    Top = 328
  end
  object ztvUnJar: TUnJar
    OnError = ztvUnZipError
    CpuType = cptAuto
    SeedDataKeys.Key0 = 305419896
    SeedDataKeys.Key1 = 591751049
    SeedDataKeys.Key2 = 878082192
    SeedHeaderKeys.Key0 = 269766672
    SeedHeaderKeys.Key1 = 33834504
    SeedHeaderKeys.Key2 = 541352064
    OnGetPassword = ztvUnZipGetPassword
    OnGetZipFirstDisk = ztvZipTVGetZipFirstDisk
    OnGetZipNextDisk = ztvZipTVGetZipNextDisk
    OnGetZipLastDisk = ztvZipTVGetZipLastDisk
    OnFileExists = ztvUnZipFileExists
    OnProgress = ztvUnZipProgress
    OnCorruptZipHeader = ztvZipTVCorruptZipHeader
    Left = 204
    Top = 328
  end
  object ztvUnLha: TUnLha
    OnError = ztvUnZipError
    CpuType = cptAuto
    OnProgress = ztvUnZipProgress
    OnFileExists = ztvUnZipFileExists
    Left = 232
    Top = 328
  end
  object ztvUnRar: TUnRar
    OnError = ztvUnZipError
    CpuType = cptAuto
    OnFileExists = ztvUnZipFileExists
    OnGetPassword = ztvUnZipGetPassword
    OnProgress = ztvUnZipProgress
    Left = 260
    Top = 328
  end
  object ztvUnTar: TUnTar
    OnError = ztvUnZipError
    CpuType = cptAuto
    OnProgress = ztvUnZipProgress
    OnFileExists = ztvUnZipFileExists
    Left = 288
    Top = 328
  end
  object ztvUnZip: TUnZip
    OnError = ztvUnZipError
    CpuType = cptAuto
    SeedDataKeys.Key0 = 305419896
    SeedDataKeys.Key1 = 591751049
    SeedDataKeys.Key2 = 878082192
    SeedHeaderKeys.Key0 = 269766672
    SeedHeaderKeys.Key1 = 33834504
    SeedHeaderKeys.Key2 = 541352064
    OnGetPassword = ztvUnZipGetPassword
    OnGetZipFirstDisk = ztvZipTVGetZipFirstDisk
    OnGetZipNextDisk = ztvZipTVGetZipNextDisk
    OnGetZipLastDisk = ztvZipTVGetZipLastDisk
    OnFileExists = ztvUnZipFileExists
    OnProgress = ztvUnZipProgress
    OnCorruptZipHeader = ztvZipTVCorruptZipHeader
    Left = 316
    Top = 328
  end
  object ztvUnZoo: TUnZoo
    OnError = ztvUnZipError
    CpuType = cptAuto
    OnProgress = ztvUnZipProgress
    OnFileExists = ztvUnZipFileExists
    Left = 344
    Top = 328
  end
  object ztvArc2Arc: TArc2Arc
    OnError = ztvArc2ArcError
    Attributes = [fsReadOnly, fsHidden, fsSysFile, fsArchive]
    AttributesEx = []
    ConfirmOverwrites = True
    TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
    OutArcType = tyBh
    OnFileExists = ztvArc2ArcFileExists
    OnProgress = ztvUnZipProgress
    OnGetPassword = ztvUnZipGetPassword
    Left = 8
    Top = 264
  end
  object ztvMakeSFX: TMakeSFX
    OnError = ztvMakeSFXError
    SfxStubDir = 'C:\WINDOWS\System32\'
    OnFileExists = ztvMakeSFXFileExists
    Left = 36
    Top = 264
  end
  object ztvZipCheck: TZipCheck
    CpuType = cptAuto
    OnCorruptZipHeader = ztvZipCheckCorruptZipHeader
    OnFileExists = ztvUnZipFileExists
    OnGetPassword = ztvUnZipGetPassword
    OnGetZipFirstDisk = ztvZipTVGetZipFirstDisk
    OnGetZipNextDisk = ztvZipTVGetZipNextDisk
    OnGetZipLastDisk = ztvZipTVGetZipLastDisk
    OnNestedTarFile = ztvZipCheckNestedTarFile
    OnProgress = ztvUnZipProgress
    OnStatus = ztvZipCheckStatus
    Left = 64
    Top = 264
  end
  object ztvZipTV: TZipTV
    SeedHeaderKeys.Key0 = 269766672
    SeedHeaderKeys.Key1 = 33834504
    SeedHeaderKeys.Key2 = 541352064
    RecurseDirs = False
    OnCorruptZipHeader = ztvZipTVCorruptZipHeader
    OnGetZipFirstDisk = ztvZipTVGetZipFirstDisk
    OnGetZipNextDisk = ztvZipTVGetZipNextDisk
    OnGetZipLastDisk = ztvZipTVGetZipLastDisk
    Left = 92
    Top = 264
  end
  object apodAddFiles: TApOpenDialog
    DefaultExt = '*.*'
    Filter = 'All Files (*.*)|*.*'
    Options = [ofHideReadOnly, ofAllowMultiSelect, ofEnableSizing, ofDontAddToRecent, ofForceShowHidden]
    OptionsEx = [ofExNoPlacesBar]
    Title = 'Select Files to Add'
    CustDlgParams.PosParams.ShiftX = 0
    CustDlgParams.PosParams.ShiftY = 0
    CustDlgParams.PosParams.FitToScreen = False
    DlgItemsCaptions.OK = '&Add'
    VisibleControls = [dcFolderCombo, dcFolderLabel, dcSelectionCtrl, dcOkBtn, dcCancelBtn, dcFileName, dcFileNameLabel, dcFileType, dcFileTypeLabel, dcToolBar]
    ListViewStyles.HotTrack = False
    ListViewStyles.HotTrackStyles = []
    ListViewStyles.FlatScrollBars = False
    ListViewStyles.GridLines = False
    ListViewStyles.RowSelect = False
    ListViewStyles.EnableRename = True
    ListViewStyles.EnableDelete = True
    ListViewStyles.PopupOnEmpty = True
    ListViewStyles.PopupOnSelection = True
    PlacesBar.Visible = False
    PlacesBar.Places = <>
    PlacesBar.AllowEdit = True
    PlacesBar.AllowDelete = True
    PlacesBar.AllowDrop = True
    PlacesBar.AutoScroll = True
    PlacesBar.BorderStyle = bsNone
    PlacesBar.Native = True
    ExtFilter.ShowFolders = True
    ExtFilter.Enabled = False
    ToolBar.Flat = False
    Left = 384
    Top = 328
  end
  object sdgSave: TSaveDialog
    DefaultExt = 'txt'
    Filter = 'Text File (*.txt)|*.txt'
    Title = 'Save Results To ...'
    Left = 412
    Top = 328
  end
  object pmSelect: TPopupMenu
    Left = 440
    Top = 328
    object miSelectAll: TMenuItem
      Caption = 'Select All'
      OnClick = miSelectAllClick
    end
    object miDeselectAll: TMenuItem
      Caption = 'Deselect All'
      OnClick = miDeselectAllClick
    end
    object miInvertSelection: TMenuItem
      Caption = 'Invert Selection'
      OnClick = miInvertSelectionClick
    end
  end
end